.entry TTY1
TTY1: mov XYZ,r5
mov Indx,r4
mov XYZlen , r0
www: .data 7,-6,9
LP1: cmp #0,r0
Jmp END
Cmp XYZ[*END],XYZ[*LP1]
Jmp END
Mov XYZ[Indx][r3],r1
Mov #-3,r6
Bne LP1
Add r7,www[*END]
END: rts
.extern XYZ
.extern Indx
.extern XYZlen
